function [beta,adjr2]=myols_simple(x,y)

[N,k] = size(x);
beta = x\y;
e = y-x*beta;
ebar = y-mean(y);
r2 = 1 - (e'*e)/(ebar'*ebar);
adjr2 = (1-k)/(N-k) + (N-1)*r2/(N-k);
return